﻿
Public Class Cliente

    Public nombre As String
    Public apellidos As String
    Public id_cliente As String
    Public telefono As String
    Public direccion As String
    Public email As String


    Public Sub New()

    End Sub
    Public Sub New(ByVal id_cliente As String, ByVal nombre As String, ByVal apellidos As String, ByVal telefono As String, ByVal direccion As String, ByVal email As String)

        Me.nombre = nombre
        Me.apellidos = apellidos
        Me.id_cliente = id_cliente
        Me.telefono = telefono
        Me.direccion = direccion
        Me.email = email

    End Sub

    Public Function getNombre() As String
        Return Me.nombre
    End Function
    Public Function getApellidos() As String
        Return Me.apellidos
    End Function
    Public Function getTelefono() As String
        Return Me.telefono
    End Function
    Public Function getDireccion() As String
        Return Me.direccion
    End Function
    Public Function getEmail() As String
        Return Me.email
    End Function
    Public Function getId_cliente() As String
        Return Me.id_cliente
    End Function

    Public Sub setNombre(ByVal nombre As String)
        Me.nombre = nombre
    End Sub
    Public Sub setApellidos(ByVal apellidos As String)
        Me.apellidos = apellidos
    End Sub
    Public Sub setTelefono(ByVal nombre As String)
        Me.nombre = nombre
    End Sub
    Public Sub setDireccion(ByVal direccion As String)
        Me.direccion = direccion
    End Sub
    Public Sub setEmail(ByVal email As String)
        Me.email = email
    End Sub
    Public Sub setId_cliente(ByVal id_cliente As String)
        Me.id_cliente = id_cliente
    End Sub

End Class

